home *** CD-ROM | disk | FTP | other *** search
- rem a sample wam ibbs logon script
- rem usage: wam5 logon.wam firstname lastname password
- rem given script filename is `logon.wam'
- rem
- script alias.wam ; rem setup some aliases
- rem
- echo \nlogon to ibbs
- open bbs 300
- wc
- if carrier
- sleep 1 ; term \n\n\n ; rem let'm no were here
- if rxwait ?
- term $1 ; rem send firstname
- rxwait ? ; term $2 ; rem then lastname
- set rxwait > ; rem used from now on
- rxwait ; term $3 ; rem password
- term ; rem do whatever
- else
- echo logon failed $1
- fi
- else
- echo logon abandoned $1
- fi
- echo goodbye $1
-